home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The Arcade• / Scarab of Ra ••••• / Scarab of RA / Scarab of RA.rsrc / CODE_28.txt < prev    next >
Text File  |  1987-12-16  |  9KB  |  171 lines
  1. # near model CODE resource
  2. # jump table entries: 34329-34332 (4 of them)
  3. export_197:
  4. 00000000  4E56 FFFC                link       A6, -0x0004
  5. 00000004  4879 0000 2844           push.l     0x2844 /* '(D' */
  6. 0000000A  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  7. 0000000E  588F                     addq.l     A7, 4
  8. 00000010  3F00                     move.w     -[A7], D0
  9. 00000012  2F2D E018                move.l     -[A7], [A5 - 0x1FE8]
  10. 00000016  4EAD 00CA                jsr        [A5 + 0xCA /* export_21 */]
  11. 0000001A  5C8F                     addq.l     A7, 6
  12. 0000001C  4A80                     tst.l      D0
  13. 0000001E  6636                     bne        +0x38 /* 00000056 */
  14. 00000020  426D E7FE                clr.w      [A5 - 0x1802]
  15. 00000024  4267                     clr.w      -[A7]
  16. 00000026  4EAD 04CA                jsr        [A5 + 0x4CA /* export_149 */]
  17. 0000002A  548F                     addq.l     A7, 2
  18. 0000002C  4879 0000 288C           push.l     0x288C
  19. 00000032  4879 0000 288A           push.l     0x288A
  20. 00000038  4879 0000 2876           push.l     0x2876 /* '(v' */
  21. 0000003E  4879 0000 284C           push.l     0x284C /* '(L' */
  22. 00000044  4EAD 057A                jsr        [A5 + 0x57A /* export_171 */]
  23. 00000048  4FEF 0010                lea.l      A7, [A7 + 0x10]
  24. 0000004C  4267                     clr.w      -[A7]
  25. 0000004E  4EAD 04D2                jsr        [A5 + 0x4D2 /* export_150 */]
  26. 00000052  548F                     addq.l     A7, 2
  27. 00000054  604E                     bra        +0x50 /* 000000A4 */
  28. label00000056:
  29. 00000056  3D6D E7FE FFFC           move.w     [A6 - 0x4], [A5 - 0x1802]
  30. 0000005C  066D FFE2 E7FE           addi.w     [A5 - 0x1802], 0xFFE2
  31. 00000062  4A6D E7FE                tst.w      [A5 - 0x1802]
  32. 00000066  6C04                     bge        +0x6 /* 0000006C */
  33. 00000068  426D E7FE                clr.w      [A5 - 0x1802]
  34. label0000006C:
  35. 0000006C  4267                     clr.w      -[A7]
  36. 0000006E  4EAD 04CA                jsr        [A5 + 0x4CA /* export_149 */]
  37. 00000072  548F                     addq.l     A7, 2
  38. 00000074  4879 0000 28D4           push.l     0x28D4
  39. 0000007A  4879 0000 28D2           push.l     0x28D2
  40. 00000080  4879 0000 28BE           push.l     0x28BE
  41. 00000086  4879 0000 288E           push.l     0x288E
  42. 0000008C  4EAD 057A                jsr        [A5 + 0x57A /* export_171 */]
  43. 00000090  4FEF 0010                lea.l      A7, [A7 + 0x10]
  44. 00000094  3B6E FFFC E7FE           move.w     [A5 - 0x1802], [A6 - 0x4]
  45. 0000009A  3F3C FFE2                move.w     -[A7], 0xFFE2
  46. 0000009E  4EAD 04D2                jsr        [A5 + 0x4D2 /* export_150 */]
  47. 000000A2  548F                     addq.l     A7, 2
  48. label000000A4:
  49. 000000A4  4E5E                     unlink     A6
  50. 000000A6  4E75                     rts
  51. 000000A8  4D55                     chk.w      D6, [A5]
  52. 000000AA  4D4D                     chk.w      D6, A5
  53. 000000AC  5920                     subq.b     -[A0], 4
  54. 000000AE  2020                     move.l     D0, -[A0]
  55. export_198:
  56. fn000000B0:
  57. 000000B0  4E56 FFFA                link       A6, -0x0006
  58. label000000B4:
  59. 000000B4  302D E804                move.w     D0, [A5 - 0x17FC]
  60. 000000B8  C1ED E806                muls.w     D0, [A5 - 0x17FA]
  61. 000000BC  3F00                     move.w     -[A7], D0
  62. 000000BE  4EAD 0572                jsr        [A5 + 0x572 /* export_170 */]
  63. 000000C2  548F                     addq.l     A7, 2
  64. 000000C4  3D40 FFFE                move.w     [A6 - 0x2], D0
  65. 000000C8  302E FFFE                move.w     D0, [A6 - 0x2]
  66. 000000CC  48C0                     ext.l      D0
  67. 000000CE  E980                     asl        D0, 4
  68. 000000D0  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  69. 000000D4  D1C0                     add.l      A0, D0
  70. 000000D6  303C 7530                move.w     D0, 0x7530 /* 'u0' */
  71. 000000DA  9068 0006                sub.w      D0, [A0 + 0x6]
  72. 000000DE  306D E804                movea.w    A0, [A5 - 0x17FC]
  73. 000000E2  2208                     move.l     D1, A0
  74. 000000E4  83FC 0002                divs.w     D1, 0x2
  75. 000000E8  306D E806                movea.w    A0, [A5 - 0x17FA]
  76. 000000EC  2408                     move.l     D2, A0
  77. 000000EE  85FC 0002                divs.w     D2, 0x2
  78. 000000F2  D242                     add.w      D1, D2
  79. 000000F4  B041                     cmp.w      D0, D1
  80. 000000F6  6FBC                     ble        -0x42 /* 000000B4 */
  81. 000000F8  4879 0000 28D6           push.l     0x28D6
  82. 000000FE  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  83. 00000102  588F                     addq.l     A7, 4
  84. 00000104  3F3C 0001                move.w     -[A7], 0x1
  85. 00000108  3F3C 0001                move.w     -[A7], 0x1
  86. 0000010C  3F00                     move.w     -[A7], D0
  87. 0000010E  4EAD 05B2                jsr        [A5 + 0x5B2 /* export_178 */]
  88. 00000112  5C8F                     addq.l     A7, 6
  89. 00000114  2D40 FFFA                move.l     [A6 - 0x6], D0
  90. 00000118  4A80                     tst.l      D0
  91. 0000011A  670E                     beq        +0x10 /* 0000012A */
  92. 0000011C  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  93. 00000120  2F2E FFFA                move.l     -[A7], [A6 - 0x6]
  94. 00000124  4EAD 05A2                jsr        [A5 + 0x5A2 /* export_176 */]
  95. 00000128  5C8F                     addq.l     A7, 6
  96. label0000012A:
  97. 0000012A  4E5E                     unlink     A6
  98. 0000012C  4E75                     rts
  99. 0000012E  4D41                     chk.w      D6, D1
  100. 00000130  4B45                     chk.w      D5, D5
  101. 00000132  4D55                     chk.w      D6, [A5]
  102. 00000134  4D4D                     chk.w      D6, A5
  103. export_195:
  104. 00000136  4E56 0000                link       A6, 0
  105. 0000013A  4AAE 000C                tst.l      [A6 + 0xC]
  106. 0000013E  6700 008E                beq        +0x90 /* 000001CE */
  107. 00000142  206E 000C                movea.l    A0, [A6 + 0xC]
  108. 00000146  0828 0007 0009           btst.b     [A0 + 0x9], 0x7
  109. 0000014C  6700 0080                beq        +0x82 /* 000001CE */
  110. 00000150  4879 0000 28DC           push.l     0x28DC
  111. 00000156  4EAD 0502                jsr        [A5 + 0x502 /* export_156 */]
  112. 0000015A  588F                     addq.l     A7, 4
  113. 0000015C  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  114. 00000160  4EAD 0112                jsr        [A5 + 0x112 /* export_30 */]
  115. 00000164  588F                     addq.l     A7, 4
  116. 00000166  302E 0010                move.w     D0, [A6 + 0x10]
  117. 0000016A  48C0                     ext.l      D0
  118. 0000016C  E980                     asl        D0, 4
  119. 0000016E  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  120. 00000172  D1C0                     add.l      A0, D0
  121. 00000174  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  122. 00000178  4868 0008                pea.l      [A0 + 0x8]
  123. 0000017C  4EAD 00AA                jsr        [A5 + 0xAA /* export_17 */]
  124. 00000180  508F                     addq.l     A7, 8
  125. 00000182  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  126. 00000186  4EAD 05AA                jsr        [A5 + 0x5AA /* export_177 */]
  127. 0000018A  588F                     addq.l     A7, 4
  128. 0000018C  302E 0010                move.w     D0, [A6 + 0x10]
  129. 00000190  48C0                     ext.l      D0
  130. 00000192  E980                     asl        D0, 4
  131. 00000194  41ED 9B58                lea.l      A0, [A5 - 0x64A8]
  132. 00000198  D1C0                     add.l      A0, D0
  133. 0000019A  226E 0008                movea.l    A1, [A6 + 0x8]
  134. 0000019E  2F11                     move.l     -[A7], [A1]
  135. 000001A0  4868 0008                pea.l      [A0 + 0x8]
  136. 000001A4  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  137. 000001A8  508F                     addq.l     A7, 8
  138. 000001AA  206E 0008                movea.l    A0, [A6 + 0x8]
  139. 000001AE  4290                     clr.l      [A0]
  140. 000001B0  06AD 0000 01F4 E7EC      addi.l     [A5 - 0x1814], 0x1F4
  141. 000001B8  4267                     clr.w      -[A7]
  142. 000001BA  4EAD 04CA                jsr        [A5 + 0x4CA /* export_149 */]
  143. 000001BE  548F                     addq.l     A7, 2
  144. 000001C0  3F2D E7F6                move.w     -[A7], [A5 - 0x180A]
  145. 000001C4  3F2D E7F4                move.w     -[A7], [A5 - 0x180C]
  146. 000001C8  4EAD 00D2                jsr        [A5 + 0xD2 /* export_22 */]
  147. 000001CC  588F                     addq.l     A7, 4
  148. label000001CE:
  149. 000001CE  4E5E                     unlink     A6
  150. 000001D0  4E75                     rts
  151. 000001D2  5448                     addq.w     A0, 2
  152. 000001D4  524F                     addq.w     A7, 1
  153. 000001D6  5753                     subq.w     [A3], 3
  154. 000001D8  4341                     chk.w      D1, D1
  155. export_196:
  156. 000001DA  4E56 0000                link       A6, 0
  157. 000001DE  206E 0008                movea.l    A0, [A6 + 0x8]
  158. 000001E2  4A28 0006                tst.b      [A0 + 0x6]
  159. 000001E6  660E                     bne        +0x10 /* 000001F6 */
  160. 000001E8  4EBA FEC6                jsr        [PC - 0x13A /* 000000B0 */]
  161. 000001EC  206E 0008                movea.l    A0, [A6 + 0x8]
  162. 000001F0  7001                     moveq.l    D0, 0x01
  163. 000001F2  1140 0006                move.b     [A0 + 0x6], D0
  164. label000001F6:
  165. 000001F6  4E5E                     unlink     A6
  166. 000001F8  4E75                     rts
  167. 000001FA  4D55                     chk.w      D6, [A5]
  168. 000001FC  4D4D                     chk.w      D6, A5
  169. 000001FE  594D                     subq.w     A5, 4
  170. 00000200  414B                     chk.w      D0, A3
  171.